home *** CD-ROM | disk | FTP | other *** search
/ Digital Talk 54 / Digital_Talk_54_2002-04-01_Digital_Talk_de_Side_A.d64 / welle erdball... (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  939b  |  24 lines
  1. 0 rem save"@:abspiel-programm",8
  2. 1 poke53280,0:poke53281,0:poke53265,11:lw=peek(186):iflw<8thenlw=8
  3. 12 ifz=0thenz=1:gosub620
  4. 13 ifz=1thenz=2:load"sm.commodore ",lw,1
  5. 14 ifz=2thenz=3:poke53265,11:sys49152:end
  6. 620 rem
  7. 621 printchr$(14):printchr$(8)
  8. 622 print"[147][155]                                       "
  9. 623 print"         [212]itel : [195][207][205][205][207][196][207][210][197] [195]=64        "
  10. 624 print"[155]                                       "
  11. 625 print"[155]            [218]eit : 00:02:57            "
  12. 626 print"[155]                                       "
  13. 627 print"[155]       [201]nterpret : [215]elle: [197]rdball      "
  14. 628 print"[155]                                       "
  15. 629 print"[155]     [193]bspielmedium : [195]ommodore [195]=64    "
  16. 630 print"[155]                                       "
  17. 631 print"[155]        [203]langbaustein : [211].[201].[196]. 2       "
  18. 632 print"[211][201][196]-[195]ompetition / [205]ekka [211]ymposium  2002"
  19. 633 print"   [201]nternetz : http://www.welle-e.de   "
  20. 634 print" [194]itte benutzen [211]ie die [[211][208][193][195][197]]-[212]aste ! ";:poke53265,27
  21. 635 geta$:ifa$=""thengoto635
  22. 636 ifa$=" "then print"[145]        [196]er [212]itel wird geladen...      ";:return
  23. 637 goto635
  24.